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Editorial 

Dear Member, 

Radio Amaturei may like to contact RAMTOP at, The School, 
Wellingborough, Northanti, NNB 2BX. -(EncloBe S.A.E). This is a radio 
computing user group with a monthly newsletter containing such items as 
RTTY and morse input programs. It is non-profit making designed only to 
serve the radio/computer enthusiast. 

“VAPOURWARE”, a new buzword which is defined as hardware announced but 
never released. (Such as the Z800 chip!). 

It s October and subscriptions are due, unless you are a direct debit 
subscriber. Payment for 1986 should be made before January bo's we can 
adjust our mail shot for the coming year. Please send subscriptions to 
Pete Vella at the USER GROUP contact address. £7.00p should be enough. 

Have you ever wondered why they have computers in schools? I think it 
enhances the teachers pay packet whilst allowing them to sit back and 
let the children play with a pseudo-technical keep-em-quiet subject, 

If computers were to be taught properly the children would need to learn 
binary arithmetic, coding, digital electronics and machine principles to 
mention but a few items. This of course would require actual teaching 
effort and knowleage (which few teachers posses) and so would never do. 

If you think that I am being harsh just consider how long it 
takes to construct a program in BASIC and then give yourself the 
restriction of a limited knowleage of algebra and a shared computer for 
short periods of time. Worse still, two or three children writing a 
program together. If it wasn't so sad it would make me laugh. Teach 
them maths, physics, english etc. Computers they will then learn in a 
few weeks if they are interested. 

Almost all of my contact with computers shows me that the subject 
is the application of mixed knowleage gained from the more fundamental 
subjects, computer science is a derived subject much as gardening is 
really aspects of bioligy, physical exercise and Latin. 


COMPUTER SUBJECT 
Binary arithmetic 
Digital electronics 
Languages 
Concepts 
Logical thought 


REAL SUBJECT 

Maths 

Physics 

English lang, Philosophy 

History, Philosophy 

Maths, Religion, English Lit. 


The only use for computers in schools is in the science lab alongside 
the scope and test tubes, as data recorders, in the study of the real 
world. 

I want my children to learn the basics of the worldwide knowleage base, 
not to fool around with an application subject, especially one that will 
be outdated faster that they can learn it. This is particularly true 
given the superficial level of keyboard to screen play-teach that is 
offered in today's schools. 

Bob Eldridge. 
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ALIEN DODGE 
BY NEL SAUNDERS 

For XTAL BASIC with a 32 column 24 line screen 
A dodge the aliens game 

18 REM 

20 REM *D0 YOU HAVE A PSG OR A PCG CARD,THIS PROQRAME * 

40 REM «WILL MAKE USE OF BOTH « 

50 REM *«*»*«****«**«««#«*«# 

100 POKES(F800,56,56,16,254,186,186,56,40,40,108 
110 POKEt(F830,84,149,75,82,58,181,90,60,155,60 
120 CLS 

130 PRINTi INPUT'‘ENTER NAME PLEASE ''jNItPRINT 

140 PRINT 

141 PRINT*' DO YOU NEED INSTRUCTIONS ";iI«INCH:IF I»89 THEN BOSUB 670 
160 PRINT:PRINT 

170 PRINTiPRINT" WHAT IS YOUR SPEED(0-9) "iiK-INCH-4e 
180 IF K<0 OR K>9 THEN170 
185 K*K»5 
190 CLS 

200 FOR ALIEN-1TO100 
210 PbS(F000 + INT(RND<768)) 

220 P0KEP,«[1C 

230 NEXTALIEN 

240 P0KE*(F2FD,8tlE,l(lF 

250 REMiSTART point.RUN COUNT 

260 R>S(F002iJ»l 

270 REM:N0 PCG POKE'R' WITH MD 
280 POKER,Si80iPOKER+32,620 
290 FORT=lTO500iNEXTT 
300 PRE=R 
310 M"KBD 

320 IFM*i(50 THEN R»R + liQ0T0 350 
330 IFM = i<51 THEN R-R-liGOTO 350 
340 R*R+32 

350 IF PEEK(R)«i(lC THEN 430 

360 IF PEEK(R)»&1E OR PEEK(R)-8(1F THEN 500 

365 REMIND PCG POKE'R' WITH MD 

370 POKEPRE,32iPOKER,«(B0 

380 REMiCONVERT SPEED INPUT 

390 S»K/K/K»1000iFORY-lTOSiNEXTY 

400 IF R>8(F2FF THEN POKER,«i20i 8OTO620 

410 GOTO300 

420 REMiCRASH ROUTINE 

425 REMiNO PCG POKE'R' WITH &1A 

430 PGKEPRE,8(20iPOKER,5[83 

440 GOSUB850 

450 FORT«1TO500:NEXT:CLS 

460 PRINT03,3,"you have just had a nasty...ACCIDENT!!" 

470 PRINT" when you recover would you like..." 

480 GOTO 570 
490 REMiWIN ROUTINE 
500 POKEPRE,5i20 
510 GOSUB910 

520 FORQ = 0TO13iOUTSiC0,Q:OUTS(Cl ,0iNEXTQiCLS 

530 PRINT:PRINT"WELL DONE ''Nl" YOU MADE IT JUST IN TIME TO ESCAPE" 
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540 PRINT* PRINT" IT TOOK Y0U''J"RUNS " 

550 PRINT" AT A SPEED 0F''jK 

560 PRINT:PRINT" YOUR ASTRO RATING |K»K/.35iPRINT 

570 PRINT" ANOTHER GAME ? "lA^INCHiIF A»B9 THEN 170 

590 CLS 

591 PRINT 

592 PRINT§0,12,"GOODBYE "N*" COME AND PLAY AGAIN SOMETIME 'STINKER'" 
600 END 

610 REMrNEW RUN 
620 R*R-768 jJ=J+1 


630 IF PEEKlR)3a,ic THEN POKER,It20 

640 GOTO370 

650 REM:INSTRUCTIONS 

660 DIM H$(6) 

670 CLS: H$(l)*".ALIEN DODGE." 

680 H*(2)="*»**###*##»»*###*»*#*»tt#*##***»M 

690 H$(3)=" you are at the top ieU oF your scanner'your 
to get to your base" 

700 H$(4)*" this you will Find at the bottoe right oF th 
710 H$(5)*" USE THE 'Q'KEY TO TAKE YOU TO 
THE LEFT AND THE 'P'KEY WILL MOVE YOU TO THE RIGHT" 

720 H$(6)«"you will be blown to bits iF... 
you hit an alien, BUT just may survive For another RUN'" 
730 Hf (7)*"'"'"''^ THE GAME WILL START ON 
ZERO COUNT 


mission is 
e scanner!" 


740 F0RI«1T07:PRINT 
750 FOR J=1T0LEN{H$(I)) 

760 PRINT MIDI(H$(I),J,1)} 

770 F0RT«1T075:NEXTT:NEXTJ:PRINT;NEXTI 
775 IOM4,I:I0M5,l 
780 FORT=100TO0 STEP-1 
790 FQRQ=1TO100!N£XTQ 

800 PRINT@6,23,T;:PRINTei0,23,"AND COUNTING": 
810 NEXT! 

815 IOM4,0:IOM5,0 
820 CLS 
830 RETURN 

840 REM:EXPL0SI0N SOUND 
850 RESTORE 880:FORT=0TO13:READA 
860 OUT&C0,TsOUTS(Cl,A 
870 NEXT! 

980 DATA0,0,0,0,0, 0,31, 7, 16,16,16, 0,1 20,0, 

890 RETURN 


900 REM:TAKE-OFF SOUND 

910 RESTORE 930: FORA = 0roi 3: READZ: OUT8(C0, A: OUT&Cl, 2 : NEXTA 
920 RESTORE 930 

930 DAT A100,0,0, 0,0,0,0,26,20,0,0,0,20, 12 
940 REM:TAKE-OFF DISPLAY 

950 FORVs=8{F2FE TO SiF000 STEP-33: POKEV-1, St20, *(20: POKEV ,& 1E ,&1F • 
FORQslTaK/K/K#100:NEXTQ:POKEV,S(20,*r20:NEXTV 
960 RETURN 
970 REM 

980 REM ******«***«««##«#**«««»*«*«»«««»*« 

990 REM # COPYRIGHT OF MEL SAUNDERS 2/84 t 
1010 REM 
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A FLOPPY DISK INTERFACE 
BY SIHON WALLER 

I soon found that using a tape recorder to store programs can oe -f 
slow and limiting. I purchased two 8 inch Shugart SA801 single s;: 
disk drives from a friend who already has a computer running CP/m, 
goal for which I now aimed. 

I chose the WD2729 interface chip as it offered simplicity of des;; 
with the ability to expand to double sided drives if I ever wanted tw 
The data sheet on the chip shows how to do the basic connections and 
set it up. Only the interface bus was left to design. 

The main problem was arranging a configuration which would allow the 
software to read and write in double density. The worst case service 
time for writing in double density (the time from when the 2797 asks for 
more data to when it must be supplied) is 11.5 microseconds. A simple 
loop checking for end of command condition or data request can not do 
this fast enough, even when running at 4Mhz. 

The 2729 has two outputs for data request (DRQ) and interrupt request 
(INTRQ), which is asserted at the end of a command. They are copies □+ 
the two least significant bits in the status register. As can be seen 
from the circuit diagram, these two lines can be read from the bus wit hi 
the other six bits presettable. 

For example, suppose that these six bits are preset to read BBllxxll. 
The four possible states of DRQ and INTRQ' are i- 


DRQ 

INTRQ 

Value 

Meaning 


0 

0 

33H 

End of command 


0 

1 

37H 

No data request, command 

in progress 

1 

0 

3BH 

End of command 


1 

1 

3FH 

Data request, command in 

progress 

program 

to write 

a sector 

now becomes : ** 



LD DE,data address 
LD CjFDC.data 
LD H,high program address 
|The next line must be at address xx33H 
JR WREND 
NOP 
NOP 

WRTSTi IN A,(status) ;addresB xx37H 

LD L,A 
JP (HL) 

JR UPEND ;addreBE xx3BH 

NOP 

NOP 

EX DE,HL laddress xx3FH 

OUTI ;write a byte to FDC 

EX DE,HL 
JP HRTST 

WRENDi 
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This program can be used for reading by changing OUTl to INI, either 
dynamically or by having another copy. Any length sector can be used as 
the loop only exits when the FDC says it has finished the operation. 

One improvement would be to replace the switches to determine the state 
of the other six bits by a latch which could be written to by the 
program, allowing more flexibility in locating the program in memory. 

In my system, the address decoding is set for 70H to 77H. Thus PORT' is 
active low for these addresses while LE' is active for 70H - 73H and CE 
for 74H - 77H. LE is used to read the status byte as above and to 
write to the latch to set the density and disk select. CE' selects the 
FDC chip so that the FDC status is at address 74H, the track register is 
75H, the sector register is 76H and the data register is 77H. 

The FDC has its own CE' input tied low permanently because of the timing 
relationship between CE', RE' and WE'. The generated CE' is combined 
with RD' and WR' to produce RE' and WE'. 

The disk is selected by the bottom two bits of the latch at address 70H- 
73H. Bit 3 is used to select the density: 0 is double density, 1 is 
51ngie density. 

I have not yet seen the circuit diagram tor the XFDC-1 from Greenbank 
Electronics so I do not know how similar it is. As it uses the same 
chip. It should be easy to convert programs written for one to use with 
this curcuit. 

It is definatly worth getting CP/M running as it gives much more freedom 
to develop and debug programs. It was not difficult to get it all 
working, the only problem being that an oscilloscope is needed to set up 
the 2797. But that's what friends are for! 


(ED- Simons's circuit is overleaf) 
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DRAUING LINES, CIRCLES AND POLYGONS MITH XTAL. 

BY BRUCE JOYCE 

n.b Although this article uses the VDU-K2 the principles are the same 
for both 32 and 64 columns. 

Before using the examples in this article, enter the line and circle 
drawing utility programs shown below i- 

1999 REM ««**t***«*«*««**«e«*»*»««#«**t«**«ff*««*«t**«»«»«*»## 

2000 REM * UTILITY TO DRAW STRAIGHT LINES FROM/TO SET COORDINATES * 

2010 REM * REQUIRES VALUES FOR A ,B (START COORDINATES) AND , # 

2012 REM * A1,G1 (FINISH COORDINATES) * 

2014 REM »**»»*«*»t*«**«tft«*«**»*«s**t««t«**«****«*t*t#*«»»#««*««f 

2020 IF A»A1 THEN GOTO 2160 
2030 C«(B1-B)/(A1-A) 

2040 IF A<A1 THEN LET S»li ELSE LET S —1 

2050 IF B<»B1 THEN LET C>ABS(C): ELSE LET C«ABS(C)*(-1) 

2060 LET D-B 

2070 IF A>A1 THEN LET A»A-li ELSE LET Al-Al-1 

2080 IF C<1 THEN LET SI —1: ELSE LET S1>1 

2090 FOR X-A TO A1 STEP S 

2100 FOR X1»D TO D+C STEP SI 

2110 SET X,X1 

2120 NEXT XI 

2130 D-D+C 

2140 NEXT X 

2150 GOTO 2200 

2160 IF B>G1 THEN SWAP G,Bli FL-1 
2170 FOR X-B TO B1 
2180 SET A,X 
2190 NEXT X 

2200 IF FL-1 THEN SWAP B,Bli FL-0 

29999 REM 

30000 REM » UTILITY TO DRAW CIRCLES ANYWHERE, ANY SIZE ON SCREEN * 

30005 REM » REQUIRES VALUES FOR AN (No. OF PLOTS) # 

30006 REM * R (RADIUS) * 

30007 REM * HC (HORIZONTAL CTR.) # 

30008 REM # VC (VERTICAL CTR.) * 

30009 REM 

30010 FOR C-0 TO 360 STEP ANi REM SET ANGLE FOR PLOT 

30020 A-C*((2*PI)/360)i REM CONVERT TO RADIANS 

30030 SET HC+(2*(C0S(A)«R)),VC^(SIN(A)*R) 

30040 NEXT C 


(ED. The above utilities are called by several of Bruce's programs in 
this article. What worries me is that there are no RETURN statements. 
Perhaps you can work it out, or Bruce will write and explain in time for 
the next issue.) 

The main body of Bruce's article begins overleaf. 
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Many users oi Interak are scientists, buisnessmen, sensible, good up 
standing pillars of society. As such the basic that is supplied by 
XTAL is just what they require. But for the rest of us, alien zapping, 
maze walking, adventure solving morons, who are sat infront of our vdu 
for hours on end, we could do with a bit of help with the grapics 
dept.. 

These utilities will help in this direction. But really it would be 
better if they could be implemented in m/c code and added to XTAL. 
Anyway, they can still be used to good effect. 

The first draws a line from one pair of co-ordinates to a second pair. 
Try EXli- 

1 REM EXl 
16 PRINT 66,6 

26 INPUT"A«")A: INPUT"B = ")Bi INPUT’'A1 = ''i A1: INPUT'*B1 = " i B1 
36 GOSUB 2666 
46 GOTO 16 

This is alright but if you want to draw something then you would need to 
always give information for both ends of the line. In EX2 this is over 
come by asigning A and B the previous A1 and Bl. Thus the end of the 
first line becomes the start of the next line. 

1 REM EX2 

16 INPUT"A»"|Ai INPUT'’B»*'iB 
26 PRINT e6,8|'*A«''|A! PRINT"B»"lB 
30 INPUT"Al»";Ali INPUT"B1«''( Bl 
46 GOSUB 2606 
50 A-Ali B-Bl 
66 GOTO 20 

Is that not a barrel of laughs? NO! alright thenilets try some circles. 
Because true circles are not made from straight lines we need a 
different form of co-ordinates. These are called 'Polar- ordinates'and 
position something in relation to a central axis and not our previous 
vert, and horz. axis. That something in our case is the cursor. Line 
36030 creates the polar ordinates on an arc of R about then axis KC/VC. 
Now try EX3i- 

1 REM EX3 

10 HC-641 VC»23j R»20: AN=5 
20 CLS 

30 GOSUB 36660 
40 R-R-4 

50 IF R<1 THEN END 
66 GOTO 30 

AN sets the angle through which the cursor will move between each plot. 
Now try EX4. This will show you something to at least get you 
intrested in experimenting with this utility. 

1 REM EX4 

18 KC-e2i VC-23} R-0} AN-3 
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28 CLS 
30 R-R+3 

48 IF R>21 THEN GOTO 108 
58 QOSUB 38080 
60 HC-HC-3 
78 GOTO 38 
188 R-R-3 

lie IF R<3 THEN END 
128 HC-HC-3 
138 QOSUe 30888 
140 GOTO 108 

Nom that look! quitt nici doti it not? Try loas your itH and tee if 
you can gat your printar to make you a hard copy. Hakaa a chaap card, 
although tha program that I Hrota for tha print routina did taka about 
liK ainutai. 

Nom for tha clavar bit. If you could usa the polar ordinataa and 
connactad thaa Hith tha co-ordinata typa itraight linai than you could 
draM polygon!. WHOOPEE!!??. Not that exciting ah. Oh wall I'll tell 
you about it any May. 

Firit Na lat AN to tha nunbar of lidat on tha polygon that wa Mant to 
draM. Na alto naad to knoM Mhara to itart draaing the polygon ai thii 
daterainat tha final poiition. For exaapla it Mould not be of much 
uie draMing a Star of David Mith both tri- anglai tha laae nay round. I 
will uaa thii in EX5. Notice in thii exaapla that not only ii the 
polygon draMn but you can luper- iapoie any aaount of other polygon! 
on top. Nom thi! card aaking look! aore iMpra!!ive. 

1 REM EX5 

10 PRINTt0,0;''ENTER SIDES,STEPS, ANGLE TO START, RAD. , HORZ. CTR, VERT. CTR," 
28 INPUT CN,Cl,R,HC,VCi REMtTO DRAW STAR SET SIDES TO 3 AND STEP TO 2 
30 FOR Y-I TO CR 
40 T«0 

58 Cl-Cl+(360/CR) 

68 QOSUB 200 
70 FOR Z-1 TO CN 

88 A-A1(Z)1 B-Bl(Z)i A1-A1U+Z}| Bl-BKl + Z) 

90 IF Z-CN THEN Al«Al(l)i Bl«BUi)* REM#THIS RETURNS TO ORQ TO COMPLETE 

100 G08UB 20001 REM«DRAW LINES TO POLAR-ORDINATES 

110 NEXT Z 

120 NEXT Y 

130 GOTO 18 

200 REM«PRaCESS POLAR ORDINATES 
210 FOR C-Cl TO 360+Cl STEP 360/CN 
220 T-T+1 

230 A»C»((2aPI)/360) 

240 Al(T)-INT<HC+(2#(C0S(A)iR>))i BUT) «INT (VC+(SIN (A) »R)) 

250 NEXT Cl RETURN 

Plea!! feel free to u!e any of thi! in your prograi! and if any one 
ha! any other utilitiea, there ia at laaat one uaar Naiting to read 
about thee in Intaraktion. 
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SNOOPY 

BY R.ELDRI06E 
For ZYBASIC systems 


1 PRON 


100 

P." 

xxxx 




110 

P." 

X XX 




120 

P." 

X X 

xxxxx 

130 

P. " 

X *##»* X 

XXX 


XX 

140 

P." 

xxxx «««*««# XXX 

xxxx 


XX 

150 

P." 

XX X ****** XXXXXXXXX 


XX XXX 

160 

P." 

XX X **** X 



X** X 

170 

P." 

X XX XX 

X 


x***x 

180 

P. ’■ 

X //XXXX 

X 


xxxx 

190 

P. “ 

X // X 



XX 

200 

P. "X 

// X 

xxxxxxxxxxxxxxxxxx/ 

210 

P. "X 

XXX// X 

X 



220 

P.*'X 

X X X 

X 



230 

P. "X 

X X X 

X 



240 

P." 

xxxx 

X 


XX 

250 

P." 

XXXX 

X 


XXX XX 

260 

P." 

X XXX X 

X 


xxxx 

270 

P." 

X X 

X 


XX X xxxx 

280 

P." 

X X 

XXXXXXXX/ 


XX XX X 

290 

P." 

XX XX 

X 


x X XX 

300 

P.” 

XX XXXX 

XXXXXX/ 

X 

xxxx 

310 

P." 

XXX 

n*** 

X 

X 

320 

P.“ 

XXXXXXXXXXXXX 

* * 

X 

X 

330 

P." 


*--* X X 


X 

340 

P." 

* 

-* * XXX X 


X 

350 

P." 

* 

- * XXX 


X 

360 

P." 

*- 

#x 

XXX 


370 

P." 

#- 

*X X 


XXX 

380 

P." 

*- 

»X X 


XX 

390 

P." 

i- 

fXX X 


X 

400 

P." 

* #X* X X 


X 

410 

P." 

« «X « X X 


X 

420 

P.*' 

* * 

X** X xxxx 


X 

430 

P. " 

* * 

X#* XX X 


X 

440 

P." 

« 

X** X XX 


X 

450 

P." 

* «« 

X* XXX X 


X 

460 

P.'* 

« ** 

XX XXXX 


XXX 

470 

P. " 

« » * 

XXXX 

X 

X 

480 

P. " 

* 4 « 

X 

X 

X 

490 

P. " 

BBBBBB8«««*«»« S * 

X 

X 

XXXXXXXXN 

500 

P. " 

* * * 

/XXXXX 

xxxxxxxx\ 

510 

P." 

88aBB«t««««*S*t * 

X 


) \ 

520 

P." 

B888« t 

X 


\ \ )XXXXX 

530 


XXXXXXXXXXXXXXXXXXXXXX 

532 

P.P. 

,p. 




534 

P." 

SNOOPY 




540 PROFF 
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VDU-2K NOD ALTERNATIVES 
fiV STEVE PADLEV 

My thanks to B.E. for a well laid out easy to follow article on the VDU- 
2K ffiod. I'm very pleased with the results and find the character size 
still comfortable without having to press my nose up against my 9" 
monitor. However I did not follow the alterations to the letter and 
managed to cut down the modification time to 3.5 hours. So for the 
benefit of other users who may be thinking of doing this mod here is a 
few alternatives to those described in the article by B.E. 

If some users are like me, they don't like the idea of track cutting 
unless there in no option, here are a couple of alternatives to the 
original article. 

Find instruction i- 
1) Cut track U14 pin 3 - U22 pin 7 
Change to i- 

1) Bend out U14 pin 3 so it does not enter socket. 

To avoid the hassle of removing the socket for U16 (U18 in my diagram) 
remove IC U16 and bend out pin 11 so it does not enter the socket. This 
means you can now neglect the following two instructions i- 

2) Cut track U16 pin 11 - ground 

2) Cut track U16 pin 8 - U16 pin 11 

Now to make the link U16 pin 11 - Ull pin 11 solder a piece of fine 
gauge insulated wire (as supplied by Greenbank) to U16 pin 11. 

Immediatly above U16 and in 
between Ull & U12 is a capacitor 
and two through board holes. 

These are of adequate diameter 
to allow the wire to pass. 

Ensure insulation is maintained 
at the point where the wire 
passes through the hole. The 
wire can now be soldered to Ull 
pin 11. NoH’Socket side. 


This idea can also be employed to 

10 using the holes to the left of the RAM's, above C17. " ' 

Finally a hint for soldering the two RAM's together. If you possess an 
IC insertion tool with metal sided jaws they provide an ideal heat shunt 
and also hold the two RAM's in the correct position whilst soldering 
them, thus minimising the possibility of damage to the I.C's. 

I hope you find these alternatives useful if you are considering this 
VDU upgrade. 



connect the two RAM's sin fl fn hr 
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GAMES ONE 
BY PETE VELLA 

For XTAL BASIC 64 with a 64 column 24 line screen 
A set of three games: 

Lunar Lander (Running out of fuel on moon) 

Crazy Maze (Negotiate the maze - 3D representation) 

Towers (Simulation of old game) 

(ED "Crazy Maze" has already been published in IUGN-5 page 11, but is 
included so as to retain the compendium intact.) 

100 CLS 

107 FOR Ma2 TO 15 STEP 5 

110 FOR X- 1 TO 126 

120 SET X,l+MiSET X,46-M 

130 NEXT X 

140 FOR Y= 2 TO 45 

150 SET l+M,YiSET 126-M,Y 

160 NEXT y 

165 NEXT M 

170 PRINT920 , 3i"*» XTAL BASIC GAMES ONE »*" 

180 PRINTe20,9) "ENTER 1 FOR ROCKET LANDER" 

185 PRINT«20,11; "ENTER 2 FOR CRAZY MAZE" 

187 PRINT920,13i"ENTER 3 FOR TOWERS" 

190 PRlNT820,15j"ENTER SELECTION NOW—>"j 
195 A$b1NCH* 

200 ON VAL (A«) 6OSUB1000,1700,4000 
300 GOTO 105 

999 INPUT""|A 

1000 CLS 

1010 PRINTTAB(29)"ROCKET" 

1020 PRINTjPRINTiPRINT 

1030 PRlNT"Lunar Landing Simulation" 

1040 PRINT".":PR1NT 

1050 INPUT "Do you want instructions (Yes or No) "(A$ 

1060 IF LEFT$(A$,1)="N" OR LEFT*(A$,1)»"n" THEN GOTO 1280 
1070 CLS 

1080 PRINT"You are landing on the moon and have taken over manual" 

1090 PRINT"control 500 Feet above a good landing spot. You have a" 

1100 PRINT"downward velocity of 50 FT/SEC. 120 units of fuel remain." 
1110 PRINT:PRINT"Here are the rules that govern your space vehicle:" 
1120 PRINT 

1130 PRINT"(1) After each second, the Height, Velocity, and remaining" 
1140 PRINT" Fuel will be reported." 

1150 PRINT"(2) After the report, A '?' will be typed. Enter the" 

1160 PRINT" number of units of fuel you wish to burn during " 

1170 PRINT" next second. Each unit of fuel will slow your decent" 
1180 PRINT" by 1 FT/SEC." 

1190 PRINT"(3) The maximum thrust of your engine is 30 FT/SEC/SEC or" 
1200 PRINT" 30 units of fuel per second." 

1210 PRINT"(4) When you contact the lunar surface, your descent engine" 
1220 PRINT" will automatically cut off and you will be given a" 

1230 PRINT" report of your landing SPEED and remaining FUEL." 

1240 PRINT"(5) If you run out of fuel, the '?' will no longer appear," 
1250 PRINT" but your second-by-second report will continue until" 
1260 PRINT" you contact the ILunar surf ace.":PRINT 
1270 INPUT "enter 'RETURN' to begin. "jRESP* 
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1280 CLSiPRINT"BEGINNING LANDING PROCEDURE. "jPRINT 

1290 PRINT" SEC FEET SPEED FUEL PLOT OF DISTANCE" 

1300 PRINT" . . 

1310 PRINT 

1320 T^0iH=500:V-50)F«120 

1330 FMT2,liPRINTTi iFMT3,l*PRINTTAB(5)HpFMT2,liPRINTTAB(5)Vp 
FMT3,1:PRINTTAB(5)F|j PRINTTAB<H/20+35) 

1340 INPUT B 

1350 IF B=0 THEN GOTO 1480 
1360 IF B>30 THEN B*30 
1370 IF B>F THEN B*F 
1380 Vl«V-B+5 
1390 F-F-B 

1400 H-H-0.5 #(V+V1) 

1410 IF H<»0THEN GOTO 1500 
1420 TsT+1 
1430 V-Vl 

1440 IF F>0 THEN GOTO 1330 
1450 IF F»0 THEN GOTO 1470 

1460 PRINT*PRINTCHR$(7)iPRINT"*#** Out of Fuel ***»" 

1470 PRINTT}:PRINTTAB(5)H|:PRINTTAB(ll)VjjPRINT TAB(18) Fjj 
PRINTTAB(H/15+30) 

1480 B<c0 
1490 GOTO 1380 

1500 PRINTiPRINT"*#** Contact *»»*"iPRINT 
1510 H»H+0.5*(V+V1) 

1520 IF B»5 THEN GOTO 1550 

1530 D«(-V+SQR(V*V+H*(10-2*B)))/(5-B) 

1540 GOTO 1560 
1550 D*H/V 
1560 Vl*V+(5-B)*D 

1570 PRINT"Touchdown at"iT+D|"Seconds" 

1580 PRINT"Landing Velocity»"jVI("FEET/SEC." 

1590 PRINT"Unit5 o^ Fuel remainingi"iF 
1600 IF V1O0 THEN GOTO 1630 

1610 PRINTtPRINT"#»**tt#» CONGRATULATIONS! A PERFECT LANDING I****»*»" 
1620 PRINT "##»#*#* YOUR LICENSE WILL BE RENEWED LATER ##**»**" 

1630 IF ABS(V1)<10 THEN GOTO 1660 

1640 PRINTiPRINT" Sorry you blew it !!!!!" 

1650 PRINT"Appropriate Condolences will be sent to your next of kin" 

1660 PRINTiPRINTiPRINT 

1670 INPUT "Another Mission ";B$ 

1680 IF LEFTHB»,1)« "Y" OR LEFT# (B$, 1) = "y" THEN GOTO 1280 
1690 PRINTjPRINT"CONTROL OUT." 

1695 RETURN 
1700 DIM M(9,9) 

1710 PRINT iCLSiRESTORE 

1720 FOR C= 1 TO 30SREAD ZiNEXT C 

1730 FOR Y « 0 TO 9 iFOR X«0 TO 9 

1740 READ M(X,Y)!NEXT XiNEXT Y 

1750 PX= 0jPY * 0: B»1 

1760 TX = PXi TY »PY 

1770 CLS [RESTOREiFOR C= 1 TO 6 

1780 READ LX,UX,LY,UY,DjMX * TX :MY « TY 

1790 GOSUB 2550 
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1808 F »M(MX,MY)iON B GOTO 1810,1820,1830,1840 

1810 Z>F AND 8: GOTO 1850 

1820 Z=F AND 1; GOTO 1850 

1830 2=F AND 2: GOTO 1850 

1840 Z=F AND 4 

1850 IF ZO0 GOTO 1880 

1860 GOSUB 2350 

1870 GOTO 1890 

1880 GOSUB 2440 

1890 ON B GOTO 1900,1918,1920,1930 

1900 Z=F AND 2:GQT0 1940 

1918 Z=F AND 4:G0T0 1940 

1920 2=F AND 8 j GOTO 1940 

1930 Z»F AND 1 

1940 IF Z <> 0 GOTO 1970 

1950 GOSUB 2410 

1960 GOTO 1980 

1970 GOSUB 2480 

1980 ON B GOTO 1990,2000,2010,2020 

1990 2=F AND li GOTO 2030 

2008 Z»F AND 2i GOTO 2030 

2010 Z«F AND 4: GOTO 2030 

2020 Z»F AND 8 

2030 IF C » 1 THEN BF » Z 

2040 IF Z <>0 GOTO 2120 

2050 ON B GOTO 2060,2070,2080,2090 

2060 TX=MXjTY«MY+ltGOTO 2100 

2070 TX=MX+1: TY*MY: GOTO 2100 

2080 TX»MX: TY»MY-ltQOTO 2100 

2090 TX=MX-1jTY=MY 

2100 NEXT C 

2110 Z=1:GOTO2130 

2120 GOSUB 2520 

2130 REM 

2140 IF PY09 OR PX09 GOTO 2170 

2150 PRINT @4,15;"CONGRATULATIONS YOU MADE IT 

2160 FOR C»1 TO 3000:NEXT C 

2165 RETURN 

2170 PRINT@4,1 ;"POSN "iPXjPYj" LOOKING ; 

2180 ON B GOTO 2190,2200,2210,2220 
2190 PRINT "NORTH";iGOTO 2230 
2200 PRINT"EAST "}i GOTO 2230 
2210 PRINT"SOUTH"I: GOTO 2230 
2220 PRINT"WEST "; 

2230 INPUT " -DIRECTION ";AI 
2240 IF AI = "N'' THEN B=l:GOTO 1760 
2250 IF A*="E" THEN 0=2:GOTO 1760 
2260 IF A$="S" THEN B=3:G0T0 1760 
2270 IF A*="W" THEN B=4iG0T0 1760 
2280 IF AI="F" AND BF=0 GOTO2300 
2290 GOTO 1760 

2300 ON B GOTO 2310,2320,2330,2340 
2310 PY=PY+l:GOTO 1760 
2320 PX=PX+l;GOTO 1760 
2330 PY=PY-l;GOTO 1760 
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2348 PX»PX-1{80T0 1760 
2350 FDR X = 1 TO 2*D-1 
2360 SET LX-X,LYiSET LX-X,UY 
2370 NEXT X:RETURN 
2390 FOR X=1 TO 2#D-1 
2390 SET UX+X,LY:SET UX+X,UY 
2400 NEXT X: RETURN 
2410 FOR X=1 TO 2*D-1 
2420 SET UX+X,LY:SET UX+X,UY 
2430 NEXT Xi RETURN 
2440 FOR Y=0 TO D-1 

2450 SET LX-Y#2,LY-Y:SET LX-Y*2-1,LY-Y 

2460 SET LX-Y*2,UY+Y}SET LX-Y*2-1,UY+Y 

2470 NEXT Y:RETURN 

2480 FOR Y = 0 TO D-1 

2490 SET UX+Y*2,UY+Y!SET UX+Y»2+1,UY+Y 

2500 SET UX+Y#2,LY-YtSET UX+Y»2+1,LY-Y 

2510 NEXT Y:RETURN 

2520 FOR X«LX TO UX 

2530 SET X,UY:SET X,LY 

2540 NEXT X:RETURN 

2550 FOR Y =LY TO UY 

2560 SET LX,Y :SET UX,Y 

2570 NEXT Y :RETURN 

2580 DATA 6,85,2,40,3 

2590 DATA 17,74,7,35,6 

2600 DATA 25,66,11,31,4 

2610 DATA 33,58,15,27,4 

2620 DATA 39,52,18,24,3 

2630 DATA 43,48,20,22,2 

2640 DATA 12,5,4,7,12,4,5,5,5,6 

2650 DATA 10,12,2,12,3,8,4,4,6,11 

2660 DATA 8,2,8,1,4,2,10,10,9,6 

2670 DATA 10,10,8,6,10,10,8,1,7,10 

2680 DATA 9,3,10,10,8,2,9,6,12,3 

2690 DATA 12,5,3,10,10,10,12,3,9,7 

2700 DATA 10,12,4,3,8,1,2,12,5,7 

2710 DATA 10,10,10,12,1,6,11,10,12,6 

2720 DATA 10,10,9,2,12,2,12,2,10,10 

2730 DATA 9,1,7,9,3,9,3,9,3,11 

4000 REM 

4010 CLS 

4015 PRINT"The object is to move all oF the disks From" 

4016 PRINT''Po5t No.l to post No,3. You may move the disks” 

4017 PRINT"in any order you wish, but never more than one at a time. 
You can also never place a large disk on top oF a" 

4019 PRINT"smaller one.PRINT:PRINT 

4020 INPUT "How many rings (1 TO 6) "jRINGSI 
4030 RIN6S*VAL(RINGS!) 

4040 IF RINGS <1 OR RINGS >6 THEN GOTO 4010 
4045 SC B0 

4050 TW(0,0)=RlNGS:TW(0,l)«0iTM(0,2)-0 
4060 FOR A« RINGS TO 1 STEP -1 
4070 TW (A,0) * RINGS-A+1 
4080 NEXT A 
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4090 REM ZERO REST 
4100 FOR A= 1 TO RINGS 
4110 TW (A,1)=0 
4120 TW (A,2)=0 
4130 NEXT A 
4140 GOSUB 4310 
4150 REM 

4160 INPUT "From which tower ‘';FT 

4170 INPUT "To which tower "jTT 

4175 SC = SC +1 

4180 FT= FT-1:TT= TT-1 

4190 IF TW(0,FT)=0 GOTO 4290 

4200 IF TW(TW(0,FT),FT)>TW(TW(0,TT),TT) AND TW(TW(0,TT),TT)<> 0 
THEN GOTO 4300 
4210 TW(0,TT)=TW(0,TT)+1 
4220 TW(TW(0,TT),TT)=TW(TW(0,FT),FT) 

4230 TW(TW(0,FT),FT)=0 
4240 TW(0,FT)=TW(0,FT)-1 
4250 GOSUG 4310 

4260 IF TW(0,2)=RINGS THEN GOTO 4580 
4270 GOTO 4160 
4280 END 

4290 PRINT"No ring on post "iFT+ltGOTO 4160 
4300 PRINT"You cant do that":B0T0 4160 
4310 REM DRAW TOWERS 
4320 CIS 

4330 FOR HT= 10 TO RINGS*2+10+4 

4340 SET 20,HTiSET 21,HT 

4350 SET 64,HT:SET65,HT 

4360 SET 108,HTiSET 109,HT 

4370 NEXT HT 

4380 FOR VT=1 TO 20 

4390 SET 20+VT-10,10 

4400 SET 64+VT-10,10 

4410 SET 10S+yT-10,10 

4420 NEXT VT 

4430 REM DRAW RINGS 

4440 VS=0 

4450 FOR T= 0 TO 2 

4460 IF TW(0,T)= 0 THEN GOTO 4550 

4470 VT=0 

4480 FOR A= 1 TO TW (0,T) 

4490 FDR HT= 20-TW(A,T)*3 TO 20+TW(A,T)*3 

4500 SET HT+VS,12+VT 

4510 SET HT+VS,13+VT 

4520 NEXT HT 

4530 VT=VT+2 

4540 NEXT A 

4550 VS=VS+44 

4560 NEXT T 

4570 RETURN 

4580 PRINT@1,30;SC )" MOVES TAKEN" 

4585 INPUT"Well done. Do you want to go again ";A$ 

4590 IF A*="v" OR A$«=''Y" THEN GOTO 4010 
4600 RETURN 
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LETTERS 

Pleaie writt with coMnonti, idtai, complainti and luggiitioni. Naat and 
addrtii auit be encloied. Reiponiibi1ity ^or viewi and connenti 
exprtfied cannot be held by the editor ai menberi letter! are publiihed 
with the fiininuft changes (deleted bad language etc). (Notej i type what 
I tee, if you forget a word then it will be missing in the newsletter, 
also if you spell a word wrong then it's quite likely that I will punch 
it in wrong.) 




Dear Ed, 

Here is a quick letter just to inform you of the fact that 
another VDU-K is now happily running a 64 by 24 screen, also to submit 
an article on the VDU-2K nod, if you think it of value to other users. 

STEVE RADLEY, 14 WICKHAM RD, FAREHAM, HANTS, PC16 7EU. 


Dear Ed, 

Once again Interaktion No 6 made interesting reading, I was 
supprised to see some of my own BubmisBions in there! Shame it only ran 
to 20 pages and was short on software. 

I will agree with you regarding 
screen size, that it should be 80 columns but 1 suspect this will mean a 
completly new VDU design, could take a little time? 

Having taken a quick 

look at the Spacehunt prog I spotted just a little error in line 610 ie. 
onmit first quote mark " before 2. 

I have now altered all my programs to 
64 columns, some I sent to you last time are 32 cols like Spacehunt. 
Hope to enclose 64 col versions, some of which have also been modified 
in other ways to include more on screen detail and sound! 

Talking of software 

I always have problems getting the stuff from Pete Vella, ie. early 
December order 'Rakovsky' chess prog sent reminder Jan 10, result 
nothing, second reminder Jan 30, third reminder Feb 19 and still at the 
minute nothing by way of a reply or a program! (27/3/85). 

I know Pete is 

very busy, and I have offered help more than once, I would think many 
members are desperate for software of all kinds. This is perhaps where 
most of all Interaktion should help and support it's members! 

Many thanks 

for printing my letter also in No 6 however there's a word missing ie. 
"I have just done your 64 column mod quite right first time" should read 
"NOT QUITE RIGHT FIRST TIME" as I did have a few problems, all may I say 
of my own doing? (I'm only a small fella and my head is in the right 
proportion!) 

I had this idea of doing the mods without any track cutting 
or socket ripping this was when I got introduced to wire-wrapping. 
Qreenbank provided the tool for about a fiver, it's so simple, and neat, 
why I did'ent use one before (for IDC connectors) I'll never know, I 
used patch pins where I could and even wire wrapped direct to IC pins. 

Congratulations to Greenbank Electronics their now starting to 
stock things like Monitors and recorders, I took delivery of one of 
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those monitors some weeks ago, it's a Ferguson MM02 2 ^reen 

screen and a bandwidth of >25Mhz. At £65 plus £4 carr 

of the best computer extras I ever purchased. I can now tell an 0 f 

an 8 etc, and vertical lines are all so straight. 1 ve also 9“* 

the new Interak ring binders tor manuals very nice finnish. Soft brown 

cover with gold blocking..^ ^ Programmer but 

my PSU will only supply rSv, is there anyone out there done a mod to 

obtain 25v from 5v? 1 would be very pleased to hear 

anyone can help interface 'Ultimate Speech Synthesiser (EbCM Mar/Apr 
B4) to Interak HELP! I get a repeating sound not alot like speech. 

Also hope to add a real time clock using MM5fll74 or f1C6B18 anyone doing 

limular or interested care to make contact. 

MEL SAUNDERS, 7 DRUMCLIFF RD, THURNBY LOOSE, LEICESTER, LE5 2LH^. 


^'*’l „i,h Bob Eldridge had written his article on CP/M a year ago 
when 1 was trying to get my system going. 1 am glad to “Y that it is 
now up and running quite happily and it was well worth the effort. 

iust like to point out that there is an error in his Bios. In DOCOM, 
ih^re data is read from or written to disk, he uses INI and OUT to 
transfer the data which decrements the B register and which is hoi ing 
the retry couht. The POP SC at address 4BE7 should be moved to 4BF5 to 

correct different BOOT ROMS available, depending 

upon the configuration of VDU, keyboard and Phihtor. The 
different hardware is overcome in CP/M by putting all hardware dependant 
code in the user written BIOS. To maintain standardisation between non- 
CP/M non-disk based Interaks, would it be possible to use Thi« 
so that software written on one configuration will run on any other, 

would involve adding the system EPROM (probaly ZYMON in most cases) at 
flTen^ry points, screen output, keyboard statu, poll, keyboard 
input, printer status poll and printer output. Another “h* 
be useful could returh the size of the screen in rows and 

that intelligent programs can adapt ^ Jelst 

output routine would have to be quite complicated and allow for at 

cursor positioning so that interesting displays may be constructed. 
when a new screen driver card, eg S0 x 26, is added, 

need to modify all your programs, only reprogram the system EPROM. 
Likewise, if the address space is expanded above 64K, the screen can b 
moved to allow for contiguous RAM with no embarris.ing hole in it.^ 

be up to Breenbank Electronics to implement this change, if it 
favourable, as ZYMON will have to be rewritten, but Interaktion can lead 
the way by defining a standard to start from. 

SIMON WALLER, 18 RICHMOND TERRACE, CLIFTON, BRISTOL, BS8 lAA. 


19 





Interaktion User Group Newsletter 


Number 9 - October 1985 


INTERAKTION BOOK LIBRARY 

This section is to give members access to a wide range of books on 
computing and electronics. The only cost to the member is that of 
postage. Books may be borrowed for up to 4 weeks. At present the books 
available are i- 

LANQUAGE BOOKS 

TRS 88 Assembly Language Programming ... Radio Shack 
Z88 Assembly Language Programming Manual.Zilog 

A Course in Basic Programming .. Sinclair 

Making the Most of your ZX 80 . Tim Hartnell 

30 Hour Basic .... C.Prigmore 

Basic for Home Computers . B.Albrecht, L.Finkel & J.Brown 

Course in Standard Coral 66 . J.O.Halliwel & T.A Edwards 

Simple Pascal ... J.McGregor & A.Uatt 

Lecture Notes in Computer Science 

Pascal User Manual and Report . K.Jensen h N.Wirth 


DATA BOOKS 

Mostek 1982/1983 Microelectronic Data Book(mem/CPU/Per) .. Mostek 


Memory Data Book It Designers Guide 1980 .. Mostek 

Bytewyde Memory Data Book 1981 . Mostek 

National Semiconductor Memory Data Book (1980)..... National 

National Semiconductor Interface Data Book (I960..... National 

TTL Data Book . National 

The European Selection (mem/inface/1in) . Motorola 


GENERAL h ELECTRONICS 


Computer Technology for Technicians 

and Technical Engineers Vol. 1 . R. 

Electronic Computers Made Simple ... H. 

Test Instruments for Electronics 

(how to build test Instruments) . M. 

Practical Test Instruments You Can Build ... W. 
How to Troubleshoot & Repair 

Electronic Test Equipment . M. 

Computers and the Social Sciences .. A. 


Watkin 
Jacobowitz 

Clifford 

Green 

Horowitz 

Brier Sc I. Robinson 


MANUALS etc. 

Epson MX-80 Type II Operation Manual . 

Newbury 8000 Series VDU Terminal 

Operator Instruction Manual .. 

Electronics Projects Index .. 

Mhy Do You Need a Personal Computer? .. 

Computer Programming in the Classroom . 

TABS Accounting Business Systems User Guide Vol 1. 
Easy Add-on Projects,Spectrum,ZX-81,Jupiter Ace .. 
6502 Games . 


Epson 

Newbury Labs 
Polytechnic 
Leventhal Sc Straffars 
B.J.Jackson 
TABS 

Owen Bishop 
Rodney Zaks 


All books have been donated by users. If you have any books etc. surplus 
to requirements please let me have them. 


See Contacts page at the end of this issue for “BOOKS" address. 

Richard Bowyer 
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SOFTWARE LIBRARY 

See Contacts page at the end o+ this issue for "ORDER FROM" addresses. 
Software supplied is the responsibility of the "ORDER FROM". Please 
deal directly with the "ORDER FROM" in the event oi bugs ect. 

You may use this section to sell software to other users. Send a single 
line entry, as below, to the EDITOR. Note that you will be responsible 
for the distribution and support of your own product, the newsletter 
cannot be held responsible for or get involved with duff code or 
distributers. Of course we will publish letters deriding any product 
that fails to live up to its claims. 


NAME 

DESCRIPTION 

CODE VDU 

ORDER FROM 

COST 

INTERAK BULLETIN BOARD SOFTWARE 

? 

7 

D.MASON 

£ 4.00 

ZYMON 2.003 

INTERAK monitor 

MC 

A 

GREENBANK 

£15.95 

ZYMON 2.203 

INTERAK monitor 

MC 

C 

GREENBANK 

£15.95 

ZYBASIC 2A 

INTERAK BASIC (tape) 

MC 

A 

GREENBANK 

£15.95 

ZYBASIC 2C 

INTERAK BASIC (Rom) 

MC 

A 

GREENBANK 

£27.75 

ZYBASIC 3A 

INTERAK BASIC (tape) 

MC 

C 

GREENBANK 

£15.95 

ZYBASIC 3C 

INTERAK BASIC (Rom) 

MC 

C 

GREENBANK 

£27.75 

XTAL BASIC 

14K BASIC 

MC 

A 

USER GROUP 

£40.00 

HAL BASIC 

14K BASIC 

MC 

C 

USER GROUP 

£40.00 

FIGFORTH 

Forth Compiler 

MC 

A 

USER GROUP 

£15.00 

FIGFORTH 

Forth Compiler 

MC 

C 

USER GROUP 

£15.00 

ASM 32 

Editor Assembler 

MC 

A 

USER GROUP 

£10.00 

ASM 64 

Editor Assembler 

MC 

C 

USER GROUP 

£10.00 

HC DISASS 

Simple Disassembler 

MC 

A 

USER GROUP 

£ 3.00 

REVAS 

Better Disassembler 

MC 

A 

USER GROUP 

POA 

MEGABUG 

Debug/Training Package MC 

C 

USER GROUP 

£13.00 

VELTEXT 

Text Editor 

MC 

A 

USER GROUP 

£ 5.00 

VELTEXT 

Text Editor 

MC 

C 

USER GROUP 

£ 5.00 

Lander 

Lander Game 

XL 

C 

USER GROUP 

PP 

Towers 

Towers Puzzle 

XL 

C 

USER GROUP 

PP 

Crazy Maze 

"3D" Maze Game 

XL 

C 

USER GROUP 

PP , 

Avalanche 

Blob Dodging Game 

ZB2 

A 

USER GROUP 

PP 

Monster Mash Maze Game 

ZB2 

A 

USER GROUP 

PP 

Graph 

Graph Plotter 

ZB2 

A 

USER GROUP 

PP 

Rakovsky 

Computer Chess (6 levs) MC 

A 

USER GROUP 

\ 

AC10. XX 

(Chess men EPROM VDU- 

K) 

A 

USER GROUP 

/ £ 3.00 

Rakovsky 

Computer Chess (6 levs) MC 

C 

USER GROUP 

\ 

AC10.XX 

(Chess men EPROM VDU- 

2K) 

C 

USER GROUP 

/ £ 3.00 

Happy Sums 

Fun maths 

ZB2 

A 

USER GROUP 

PP 

Hangman 

Spelling game 

ZB2 

A 

USER GROUP 

PP 

0's and X's 

Game 

ZB2 

A 

USER GROUP 

PP 

Pools Pick 

Random Draw Selector 

ZB2 

A 

USER GROUP 

PP 

Count 

Learn to count 

ZB2 

A 

USER GROUP 

PP 

Dice Pontoon Simple Game 

ZB2 

A 

USER GROUP 

PP 

Kev: MC 

8 machine code. 


VDU: A 32 x 

24 VDU-K 

ZB2 « ZYBASIC. 



B 64 X 

16 VDU-IK 

XL 

, * XTAL BASIC. 



C 64 X 

24 VDU-2K 


PP » Postage & Packing. 

PDA « Please enquire (Price on Application). 
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CONTACTS 

BACK ISSUES... To obtain Back Issues write to i- 

Mr D.Parkins, Greenbank Electronics, 92 New Chester road, 
New Ferry, Wirral, Merseyside, L62 SAG. 

BOOKS.. To borrow or supply books contact 

Mr R.E.Bowyer, 45 Ford drive, Yarnfield, Stone, Staffs. 

BULLETIN BOARD.For information and software contact i- 

Mr D.Mason, Pererill Court, Mooragh Promenade, Ramsey, 
Isle of man. 


0.MASON.Mr D.Mason, Pererill Court, Mooragh Promenade, Ramsey, 

Isle of man. 

EDITOR. Send newsletter contributions to »- 

Mr R.Eldridge, 28 Wycherley Close, Blackheath, London, 
SE3 7QH. Please no phone calls. 


GREENBANK .... To obtain software from Greenbank write to t- 
Greenbank Electronics Ltd, 92 New Chester road, 
New Ferry, Wirral, Merseyside, L62 5AQ. 

MEMBERSHIP.... For membership information contact t- 

Mr P.P.Vella, 19 Ford drive, Yarnfield, Staffs. 


P.C TAPES. For details contact 

Mr M.Saunders, 7 Drumcliff road, Thurnby Lodge, 
Leicester, LE5 2LH. 

SUBSCRIPTIONS. For lUG subscriptions contact i- 

Mr P.P.Vella, 19 Ford drive, Yarnfield, Staffs. 

USER GROUP ... To obtain software from the User Group write to i- 
Mr P.P.Vella, 19 Ford Drive, Yarnfield, Staffs. 
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Dear User, 


Please use the form below to arrange payment of your membership 
fee. 

Two tariffs apply: 


1) Standing Order 0 £6.00 per annum. 

2) Cheque or Postal Order £7.00 per annum. 

These fees Include 4 issues of our mag and access to a technical 
book and software library. 


Please make cheques etc, payable to INTERAKTION. 


A Standing Order Mandate is to be found on a separate sheet for 
you to complete and send to your bank, if you want to take 
advantage of the reduced rate. 

INTERAKTION Account held at Midland Bank pic 

Stone 

Staffordshire 

Account number 63036227 Sorting Code 40-43-14 


I have today given instructions to my bank to transfer by 
Standing Order the sum of £6.00 per annum to the INTERAKTION 
account. 

NAME . Address ... 


DATE _/...../19... 


Please complete the above and send it to: 

P.P. Vella, 19 Ford Drive, Yarnfield, Nr. Stone, Staffs, ST15 ORP 











Standing Order Mandate 

_. Bank pic 


( Bonk Nome) 

Address- 


Please pay 


for the credit of 


the sum of 


Subsequent 

payments 


Bank 


MlfiLAh/D BANK PLC 


Branch Title not address 


STONE 


Beneficiary 


!NTERAK7lOht 


Date and amount of first payment 


Amount in figures 


£ 6-00 


£ 6-00 


Date 


and thereafter every 


Amount in words 


SIX POUNDS ONLY 


Sorting Code number 


40—43 — >4- 


Account number 


Date and frequency 


ANNUALLY 


quoting the 
reference 


(name) 


until you receive further notice from me/us 
in writing 

and debit my/our account accordingly. 


Special instructions 


Signature/s -- 

Title of account and 
account number to be debited 


'Cir/nv vlTlddld Tax or pay a s.a.ed sunr plus V.A.T., or other indeterminate element. 

.) advise remitter's address to beneficiary. 

) advise beneficiary of inability to pay. 

1) request beneficiary's banker to advise beneficiary of receipt. 



